home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Visual Database / Visual BASIC 5.0 (Ent. Edition) / Vb5ent Extractor.EXE / VB / SAMPLES / ENTRPRIS / HELLO / HELO_CLI.FRM (.txt) next >
Encoding:
Visual Basic Form  |  1996-11-23  |  1.2 KB  |  41 lines
  1. VERSION 5.00
  2. Begin VB.Form frmClient 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   3  'Fixed Dialog
  5.    Caption         =   "HelloWorld Client"
  6.    ClientHeight    =   1485
  7.    ClientLeft      =   2820
  8.    ClientTop       =   3855
  9.    ClientWidth     =   3345
  10.    LinkTopic       =   "Form1"
  11.    MaxButton       =   0   'False
  12.    MinButton       =   0   'False
  13.    PaletteMode     =   1  'UseZOrder
  14.    ScaleHeight     =   1485
  15.    ScaleWidth      =   3345
  16.    Begin VB.CommandButton cmdSayHi 
  17.       Caption         =   "Say Hello"
  18.       Height          =   360
  19.       Left            =   1140
  20.       TabIndex        =   0
  21.       Top             =   540
  22.       Width           =   990
  23.    End
  24. Attribute VB_Name = "frmClient"
  25. Attribute VB_GlobalNameSpace = False
  26. Attribute VB_Creatable = False
  27. Attribute VB_TemplateDerived = False
  28. Attribute VB_PredeclaredId = True
  29. Attribute VB_Exposed = False
  30. Option Explicit
  31. Dim objNew As Object
  32. Private Sub cmdSayHi_Click()
  33.   MsgBox objNew.SayHello
  34. End Sub
  35. Private Sub Form_Load()
  36.   Set objNew = CreateObject("HelloProj.HelloClass")
  37. End Sub
  38. Private Sub Form_Unload(Cancel As Integer)
  39.   Set objNew = Nothing
  40. End Sub
  41.